home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / FROMUTS / RISCBBS / !RiscBBS / Menus / Filebase / QueueMaint < prev    next >
Text File  |  1992-02-24  |  660b  |  36 lines
  1. {
  2.  report `Queue maintenance`
  3.  
  4.  defopt D= `Download queue` 10 ``
  5.    pushmenu
  6.    menu Filebase.DownloadQ
  7.  endopt
  8.  
  9.  defopt L= `List queue` 10 ``
  10.    f_listq
  11.  endopt
  12.  
  13.  defopt R= `Remove file` 10 ``
  14.    f_delq #
  15.  endopt
  16.  
  17.  defopt C= `Clear queue` 10 ``
  18.    f_clrq
  19.  endopt
  20.  
  21.  defopt Q= `Quit` 10 ``
  22.    menu Filebase.Main
  23.  endopt
  24.  
  25.  attr 0 7 
  26. }
  27. {attr 4 3}  -- Queue Maintenance --  {attr 0 2}  {_time} / {_online fg 7}  {bg 4 cll bg 0}
  28.  
  29.      [{fg 1}D{fg 7}]ownload queue                     [{fg 1}L{fg 7}]ist queue
  30.  
  31.      [{fg 1}R{fg 7}]emove file from queue             [{fg 1}C{fg 7}]lear queue
  32.  
  33.      [{fg 1}Q{fg 7}]uit maintenance
  34.  
  35.  {show <RiscBBS$Dir>.BBS.Select eof}
  36.